-- remember to update carried if you do not pass take
pass take
end take
on drop
global object,dropRoom,carried
-- remember to update carried if you do not pass drop
pass drop
end drop
on use
global object,carried
-- update carried if use results in loss of object
pass use
end use
-- part 16 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=122 top=230 right=266 bottom=156
-- title width / last selected line: 0
-- icon id / first selected line: 9301 / 9301
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: knife
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a knife" into field 3
put false into examFlag
end mouseUp
-- part 17 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=89 top=195 right=231 bottom=123
-- title width / last selected line: 0
-- icon id / first selected line: 1015 / 1015
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: nodule
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a silicon sphere" into field 3
put false into examFlag
end mouseUp
-- part 18 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=122 top=195 right=231 bottom=156
-- title width / last selected line: 0
-- icon id / first selected line: 14953 / 14953
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: ladder
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a rope ladder" into field 3
put false into examFlag
end mouseUp
-- part 20 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=89 top=160 right=196 bottom=123
-- title width / last selected line: 0
-- icon id / first selected line: 24317 / 24317
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: key
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a key" into field 3
put false into examFlag
end mouseUp
-- part 21 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=158 top=210 right=246 bottom=192
-- title width / last selected line: 0
-- icon id / first selected line: 7012 / 7012
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: gem
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a glowing gem" into field 3
put false into examFlag
end mouseUp
-- part 22 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=130 top=157 right=193 bottom=164
-- title width / last selected line: 0
-- icon id / first selected line: 23078 / 23078
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: orb
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a crystal orb" into field 3
put false into examFlag
end mouseUp
-- part 33 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=167 top=70 right=124 bottom=219
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global examFlag,direction,cardID
if examFlag then
put "A hole blasted in the orange flowstone wall leads south." into field 3
put false into examFlag
else
put "south" into direction
send move to card id cardID
end if
end mouseUp
-- part 41 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=21 top=140 right=214 bottom=49
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global examFlag,direction,cardID
if examFlag then
put "a tunnel leading upward to the east." into field 3
put false into examFlag
else
put "east" into direction
send move to card id cardID
end if
end mouseUp
-- part contents for background part 25
----- text -----
Flowstone Room
(looking south)
-- part contents for background part 24
----- text -----
You are in an odd shaped room with wonderful flowstone formations on all of the walls. The south wall is a large sheet of orange flowstone with a gaping hole blasted through it, leading to a room beyond. A tunnel slants upward to the east.